home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Interactive CD Sampler / Microsoft Interactive CD Sampler.iso / DEMOS / C_Automp / AUTOTP / TRIPPLAN.DIR / Scripts_8_quit.ls < prev    next >
Encoding:
Text File  |  1996-07-25  |  379 b   |  17 lines
  1. on mouseDown
  2.   global transNum
  3.   puppetSound(1, 0)
  4.   if transNum then
  5.     puppetTransition(transNum, 0)
  6.     set transNum to 0
  7.   end if
  8.   set the memberNum of sprite 47 to the number of member "quit down"
  9.   updateStage()
  10.   repeat while the mouseDown
  11.     nothing()
  12.   end repeat
  13.   set the memberNum of sprite 47 to the number of member "quit up"
  14.   updateStage()
  15.   go("credits")
  16. end
  17.